object ThesDialog: TThesDialog Left = 515 Top = 241 ActiveControl = WordList BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'xxThesaurus: English' ClientHeight = 211 ClientWidth = 361 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False OnCloseQuery = FormCloseQuery PixelsPerInch = 96 TextHeight = 13 object LookedUpLabel: TLabel Left = 8 Top = 8 Width = 66 Height = 13 Caption = 'xxLooked &Up:' FocusControl = LookupCombo end object ContextsLabel: TLabel Left = 8 Top = 56 Width = 54 Height = 13 Caption = 'xxConte&xts:' FocusControl = ContextLV end object ReplaceWithLabel: TLabel Left = 184 Top = 8 Width = 78 Height = 13 Caption = 'xxReplace &With:' FocusControl = ReplaceEdit end object LookupCombo: TComboBox Left = 8 Top = 24 Width = 161 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 0 OnChange = LookupComboChange end object ContextLV: TListView Left = 8 Top = 72 Width = 161 Height = 105 Anchors = [akLeft, akTop, akBottom] Columns = < item end item end> HideSelection = False ReadOnly = True RowSelect = True ShowColumnHeaders = False TabOrder = 1 ViewStyle = vsReport OnChange = ContextLVChange end object ReplaceEdit: TEdit Left = 184 Top = 24 Width = 169 Height = 21 TabOrder = 2 OnChange = ReplaceEditChange end object CloseButton: TButton Left = 278 Top = 184 Width = 75 Height = 23 Anchors = [akLeft, akBottom] Cancel = True Caption = 'xx&Close' TabOrder = 6 OnClick = CloseButtonClick end object PreviousButton: TButton Left = 8 Top = 184 Width = 75 Height = 23 Anchors = [akLeft, akBottom] Caption = 'xx&Previous' Enabled = False TabOrder = 4 OnClick = PreviousButtonClick end object ReplaceButton: TButton Left = 192 Top = 184 Width = 75 Height = 23 Anchors = [akLeft, akBottom] Caption = 'xx&Replace' Enabled = False TabOrder = 5 OnClick = ReplaceButtonClick end object WordList: TListView Left = 192 Top = 48 Width = 162 Height = 129 Anchors = [akLeft, akTop, akBottom] Columns = < item end> HideSelection = False ReadOnly = True RowSelect = True ShowColumnHeaders = False TabOrder = 3 ViewStyle = vsReport OnChange = WordListChange OnDblClick = WordListDblClick end object LookupButton: TButton Left = 94 Top = 184 Width = 75 Height = 23 Anchors = [akLeft, akBottom] Caption = 'xx&Lookup' Enabled = False TabOrder = 7 OnClick = LookupButtonClick end object DialogControl: TThesaurusDialogCtrl OnPromptLookup = DialogControlPromptLookup OnPromptContext = DialogControlPromptContext OnActivate = DialogControlActivate Left = 200 Top = 56 end object Timer: TTimer Enabled = False Interval = 10 OnTimer = TimerTimer Left = 200 Top = 88 end end